public class Clientes

   private _codcliente as Int32
   public property codcliente() as Int32
       get
           return _codcliente
       end get

       set(byval value as Int32)
           _codcliente = value
       end set
   end property

   private _nombre as String
   public property nombre() as String
       get
           return _nombre
       end get

       set(byval value as String)
           _nombre = value
       end set
   end property

   private _direccion as String
   public property direccion() as String
       get
           return _direccion
       end get

       set(byval value as String)
           _direccion = value
       end set
   end property

   private _telefono as String
   public property telefono() as String
       get
           return _telefono
       end get

       set(byval value as String)
           _telefono = value
       end set
   end property

   private _celular as String
   public property celular() as String
       get
           return _celular
       end get

       set(byval value as String)
           _celular = value
       end set
   end property

   private _codciudad as Int32
   public property codciudad() as Int32
       get
           return _codciudad
       end get

       set(byval value as Int32)
           _codciudad = value
       end set
   end property

   private _ruc as String
   public property ruc() as String
       get
           return _ruc
       end get

       set(byval value as String)
           _ruc = value
       end set
   end property

   private _saldo as Decimal
   public property saldo() as Decimal
       get
           return _saldo
       end get

       set(byval value as Decimal)
           _saldo = value
       end set
   end property

   private _codtipocliente as Int32
   public property codtipocliente() as Int32
       get
           return _codtipocliente
       end get

       set(byval value as Int32)
           _codtipocliente = value
       end set
   end property

end class
